unit Uamcomdef;

interface

uses
  System.Types;

const
  MNull = 0;

  MFalse = 0;
  MTrue = 1;

  MAX_PATH = 256;

type
  MWChar = WideChar;
  MLong = LongInt;
  MFloat = Single;
  MPFloat = ^MFloat;
  MDouble = Double;
  MByte = Byte;
  MPByte = PByte;
  MWord = Word;
  MDWord = Cardinal;
  MHandle = Pointer;
  MPHandle = ^MHandle;
  MChar = AnsiChar;
  MBool = LongInt;
  // typedef void					MVoid;
  MPVoid = Pointer;
  MPChar = PAnsiChar;
  MShort = Shortint;
  MPCChar = PAnsiChar;
  MRESULT = MLong;
  MCOLORREF = MDWord;
  MInt8 = Shortint;
  MUInt8 = Byte;
  MPUInt8 = PByte;
  MInt16 = Smallint;
  MUInt16 = Word;
  MInt32 = Integer;
  MPInt32 = PInteger;
  MUInt32 = Longword;
  MInt64 = Int64;
  MUInt64 = UInt64;
  MTChar = MChar;

  // MRECT = packed record
  // left: MInt32;
  // top: MInt32;
  // right: MInt32;
  // bottom: MInt32;
  // end;
  MRECT = TRect;
  PMRECT = ^MRECT;

implementation

end.
